(*	Solace will define the following variables for you:
 *	
 *	oldPath - A Mac OS 9 styled full path name to the attachment file
 *	unixPath - A Unix-styled full path name
 *	theRecipients - A comma-separated list of email addresses to send to
 *	theSubject - String which contained the subject
 *	theBody - String which contains the body of the email
 *)

tell application "Mail"

	activate

	set this_message to make new compose message at beginning of every compose message with properties {subject:theSubject,content:theBody}

	tell this_message
		set content to return & return & content
		make new recipient at end of recipients with properties {display name:theRecipients}
		tell content
			make new text attachment with properties {file name:unixPath} at before the first word of the first paragraph
		end tell
	end tell
	
	set content of this_message to the content of this_message
	make new message editor at beginning of message editors
	set compose message of message editor 1 to this_message

end tell
